home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / msdos / raytrace / pov / gen / form04a / sue / fern.frm < prev    next >
Encoding:
Text File  |  1994-01-25  |  747 b   |  20 lines
  1. Copyright (c) Sue Cunningham
  2.  
  3. part1 = sphere stack 10 bend 60 grow 0.5;
  4. baby_part1 = sphere 0.2 stack 6 bend 60 grow 0.5;
  5. babys = sphere 0.2;
  6. Baby_spine = box <0.3, 0.3, 0.3> stack 5 grow 0.5 twist 45;
  7. Baby_bit1  = babys , babys ,  [ Baby_spine ] stack 15 twist 9*150;
  8. baby_bit1a = babys stack 5 bend -78;
  9. Baby_bit2 = baby_bit1a, Baby_bit1;
  10. baby_spiney = Baby_bit2, baby_part1;
  11. Main_spine = box <1.0 , 1.0 , 1.0>, box <0.8, 0.8, 0.8>, box <0.6, 0.6, 0.6>, 
  12.   [baby_spiney], box <0.4, 0.4, 0.4>, box <0.2, 0.2, 0.2>, box <0.1, 0.1, 0.1>;
  13. Main_bit1  = sphere , sphere , [ Main_spine ] stack 45 
  14.   twist 9*180 bend 30 grow 0.5;
  15. head  = box <0.1 , 0.2, 0.1> fan 21 , 180;
  16. spiney= Main_bit1, part1;
  17. fern=spiney fan 6, 90;
  18. fern;
  19. end;
  20.